                1    *
                2    * MURYADEN/AFFICHE ENTETE MENU
                3    * (C)1989 BY DECKARD
                4    *
                5                                   ;
                6                  ORG    $4000     
                7                                   ;
                8    Y             EQU    $1A       
                9    HPOSN         EQU    $F411     
                10   RESULM        EQU    $26       ; RESULTAT(-) APRES JSR HPOSN
                11                                  ;
                12                                  ;
4000: A9 20     13                 LDA    #$20      ; PAGE 1
4002: 85 E6     14                 STA    $E6       
4004: 20 F2 F3  15                 JSR    $F3F2     ; EFFACE ECRAN HGR EN NOIR
4007: A9 00     16   DEBUT         LDA    #$00      ; (VALEUR DE Y INITIALE)
4009: 85 1A     17                 STA    Y         
                18                                  ;
                19                                  ; BOUCLE Y
                20                                  ;
400B: A5 1A     21   LOOPY         LDA    Y         
400D: C9 30     22                 CMP    #48       ; =48?
400F: D0 0D     23                 BNE    FOLLOW1   
                24                                  ;
4011: 2C 54 C0  25                 BIT    $C054     ; AFFICHE LE TRAVAIL
4014: 2C 50 C0  26                 BIT    $C050     
4017: 2C 57 C0  27                 BIT    $C057     
401A: 2C 52 C0  28                 BIT    $C052     
401D: 60        29                 RTS              ; FIN DU PROGRAMME
                30                                  ;
                31                                  ; DETERMINE POSITION ECRAN
                32                                  ;
401E: A2 00     33   FOLLOW1       LDX    #00       ; X(-)
4020: A0 00     34                 LDY    #00       ; X(+)
4022: A5 1A     35                 LDA    Y         
4024: 20 11 F4  36                 JSR    HPOSN     
                37                                  ;
                38                                  ; BOUCLE X
                39                                  ;
4027: A0 00     40                 LDY    #$00      
4029: A2 00     41                 LDX    #$00      
402B: BD 4C 40  42   CHARGE        LDA    STOCK,X   ;
402E: 91 26     43                 STA    (RESULM),Y 
4030: E8        44                 INX              
4031: C8        45                 INY              
4032: E0 28     46                 CPX    #40       ; X=40?
4034: D0 F5     47                 BNE    CHARGE    
                48                                  ;
                49                                  ; AUGMENTE VALEUR DE STOCK
                50                                  ;
4036: 18        51                 CLC              
4037: AD 2C 40  52                 LDA    CHARGE+1  ; (-)
403A: 69 28     53                 ADC    #40       
403C: 8D 2C 40  54                 STA    CHARGE+1  ; (-)
403F: AD 2D 40  55                 LDA    CHARGE+2  
4042: 69 00     56                 ADC    #$00      ; RETENUES
4044: 8D 2D 40  57                 STA    CHARGE+2  
                58                                  ;
4047: E6 1A     59                 INC    Y         
4049: 4C 0B 40  60                 JMP    LOOPY     
                61                                  ;
                62                                  ; DEBUT DATA ECRAN ENTETE
                63                                  ;
                64   STOCK                          
                65   
404C: 80 80 80  66                 HEX    808080808080808080787F7F7F7F7F7F 
404F: 80 80 80 80 80 80 78 7F 
4057: 7F 7F 7F 7F 7F 
405C: 7F 7F 7F  67                 HEX    7F7F7F7F7F7F7F7F7F7F7F7F7F7F0F80 
405F: 7F 7F 7F 7F 7F 7F 7F 7F 
4067: 7F 7F 7F 0F 80 
406C: 80 80 80  68                 HEX    80808080808080808080808080808080 
406F: 80 80 80 80 80 80 80 80 
4077: 80 80 80 80 80 
407C: 80 7C 7F  69                 HEX    807C7F7F7F7F7F7F7F7F7F7F7F7F7F7F 
407F: 7F 7F 7F 7F 7F 7F 7F 7F 
4087: 7F 7F 7F 7F 7F 
408C: 7F 7F 7F  70                 HEX    7F7F7F7F7F7F1F808080808080808080 
408F: 7F 7F 7F 1F 80 80 80 80 
4097: 80 80 80 80 80 
409C: 80 80 80  71                 HEX    8080808080808080801E000000000000 
409F: 80 80 80 80 80 80 1E 00 
40A7: 00 00 00 00 00 
40AC: 00 00 00  72                 HEX    00000000000000000000000000003C80 
40AF: 00 00 00 00 00 00 00 00 
40B7: 00 00 00 3C 80 
40BC: 80 80 80  73                 HEX    80808080808080808080808080808080 
40BF: 80 80 80 80 80 80 80 80 
40C7: 80 80 80 80 80 
40CC: 80 0F 00  74                 HEX    800F0000000000000000000000000000 
40CF: 00 00 00 00 00 00 00 00 
40D7: 00 00 00 00 00 
40DC: 00 00 00  75                 HEX    00000000000078808080808080808080 
40DF: 00 00 00 78 80 80 80 80 
40E7: 80 80 80 80 80 
40EC: 80 80 80  76                 HEX    80808080808080808007000000000000 
40EF: 80 80 80 80 80 80 07 00 
40F7: 00 00 00 00 00 
40FC: 00 00 00  77                 HEX    00000000000000000000000000007080 
40FF: 00 00 00 00 00 00 00 00 
4107: 00 00 00 70 80 
410C: 80 80 42  78                 HEX    80804280808080808080808080A10080 
410F: 80 80 80 80 80 80 80 80 
4117: 80 80 A1 00 80 
411C: 80 07 00  79                 HEX    80070000000000000000000000000000 
411F: 00 00 00 00 00 00 00 00 
4127: 00 00 00 00 00 
412C: 00 00 00  80                 HEX    000000000000708080800C0380808080 
412F: 00 00 00 70 80 80 80 0C 
4137: 03 80 80 80 80 
413C: 80 80 80  81                 HEX    80808080E01800808007000000000000 
413F: 80 E0 18 00 80 80 07 00 
4147: 00 00 00 00 00 
414C: 00 00 00  82                 HEX    00000000000000000000000000007080 
414F: 00 00 00 00 00 00 00 00 
4157: 00 00 00 70 80 
415C: 80 80 18  83                 HEX    808018078080808080808080F00C0080 
415F: 07 80 80 80 80 80 80 80 
4167: 80 F0 0C 00 80 
416C: 80 07 00  84                 HEX    80070000000000000000000000000000 
416F: 00 00 00 00 00 00 00 00 
4177: 00 00 00 00 00 
417C: 00 00 00  85                 HEX    00000000000070808010381F80808080 
417F: 00 00 00 70 80 80 10 38 
4187: 1F 80 80 80 80 
418C: 80 80 80  86                 HEX    80808080FC0E04008007000000000000 
418F: 80 FC 0E 04 00 80 07 00 
4197: 00 00 00 00 00 
419C: 00 00 00  87                 HEX    00000000000000000000000000007080 
419F: 00 00 00 00 00 00 00 00 
41A7: 00 00 00 70 80 
41AC: 80 18 38  88                 HEX    8018381F8010808080808200FC0E0C00 
41AF: 1F 80 10 80 80 80 80 82 
41B7: 00 FC 0E 0C 00 
41BC: 80 07 00  89                 HEX    80070000000000000000000000000000 
41BF: 00 00 00 00 00 00 00 00 
41C7: 00 00 00 00 00 
41CC: 00 00 00  90                 HEX    0000000000007080803E307780208080 
41CF: 00 00 00 70 80 80 3E 30 
41D7: 77 80 20 80 80 
41DC: 80 80 81  91                 HEX    80808100F7063E008007000000000000 
41DF: 00 F7 06 3E 00 80 07 00 
41E7: 00 00 00 00 00 
41EC: 00 00 00  92                 HEX    00000000000000000000000000007080 
41EF: 00 00 00 00 00 00 00 00 
41F7: 00 00 00 70 80 
41FC: 40 5F 31  93                 HEX    405F31770160808080C08140F7467D01 
41FF: 77 01 60 80 80 80 C0 81 
4207: 40 F7 46 7D 01 
420C: 80 07 00  94                 HEX    80070000000000000000000000000000 
420F: 00 00 00 00 00 00 00 00 
4217: 00 00 00 00 00 
421C: 00 00 00  95                 HEX    0000000000007080783C307B06400380 
421F: 00 00 00 70 80 78 3C 30 
4227: 7B 06 40 03 80 
422C: 80 F0 00  96                 HEX    80F000306F061E0F8007000000000000 
422F: 30 6F 06 1E 0F 80 07 00 
4237: 00 00 00 00 00 
423C: 00 00 00  97                 HEX    00000000000000000000000000007080 
423F: 00 00 00 00 00 00 00 00 
4247: 00 00 00 70 80 
424C: 78 7F 53  98                 HEX    787F533B0F400F84887C007C6E657F0F 
424F: 3B 0F 40 0F 84 88 7C 00 
4257: 7C 6E 65 7F 0F 
425C: 80 07 00  99                 HEX    80070000000000000000000000000000 
425F: 00 00 00 00 00 00 00 00 
4267: 00 00 00 00 00 
426C: 00 00 00  100                HEX    0000000000007080777F505D3F807783 
426F: 00 00 00 70 80 77 7F 50 
4277: 5D 3F 80 77 83 
427C: F0 3B 00  101                HEX    F03B00F75D457F778007000000000000 
427F: F7 5D 45 7F 77 80 07 00 
4287: 00 00 00 00 00 
428C: 00 00 00  102                HEX    00000000000000200000000000007080 
428F: 00 00 00 00 20 00 00 00 
4297: 00 00 00 70 80 
429C: 80 7B 67  103                HEX    807B676D7B014D81E02C606F5B736F01 
429F: 6D 7B 01 4D 81 E0 2C 60 
42A7: 6F 5B 73 6F 01 
42AC: 80 07 00  104                HEX    8007000000000000000E0F0000000070 
42AF: 00 00 00 00 00 00 0E 0F 
42B7: 00 00 00 00 70 
42BC: 00 00 00  105                HEX    0000000000007080807053767D4F1980 
42BF: 00 00 00 70 80 80 70 53 
42C7: 76 7D 4F 19 80 
42CC: 80 E6 7C  106                HEX    80E67C5F37670700800700000000000F 
42CF: 5F 37 67 07 00 80 07 00 
42D7: 00 00 00 00 0F 
42DC: 1C 58 18  107                HEX    1C58180000005F7C03007F0E70007080 
42DF: 00 00 00 5F 7C 03 00 7F 
42E7: 0E 70 00 70 80 
42EC: 80 70 37  108                HEX    8070373F7E63308080C3713F7E7E0700 
42EF: 3F 7E 63 30 80 80 C3 71 
42F7: 3F 7E 7E 07 00 
42FC: 80 07 00  109                HEX    800700003F7E00041830307C40616000 
42FF: 00 3F 7E 00 04 18 30 30 
4307: 7C 40 61 60 00 
430C: 0E 60 60  110                HEX    0E60601C6000708002705B4F7F106080 
430F: 1C 60 00 70 80 02 70 5B 
4317: 4F 7F 10 60 80 
431C: C0 81 42  111                HEX    C081427F796D07208007007060030702 
431F: 7F 79 6D 07 20 80 07 00 
4327: 70 60 03 07 02 
432C: 18 30 30  112                HEX    18303030603060401830403840007080 
432F: 30 60 30 60 40 18 30 40 
4337: 38 40 00 70 80 
433C: 04 78 6D  113                HEX    04786D730F804081E00000FC675B0F10 
433F: 73 0F 80 40 81 E0 00 00 
4347: FC 67 5B 0F 10 
434C: 80 07 00  114                HEX    8007001840010C011830301860186030 
434F: 18 40 01 0C 01 18 30 30 
4357: 18 60 18 60 30 
435C: 30 18 00  115                HEX    30180068400070800578767C80804081 
435F: 68 40 00 70 80 05 78 76 
4367: 7C 80 80 40 81 
436C: E0 00 00  116                HEX    E00000809F370F508007000C40015801 
436F: 80 9F 37 0F 50 80 07 00 
4377: 0C 40 01 58 01 
437C: 18 30 18  117                HEX    1830180C600C6018601C404841007080 
437F: 0C 60 0C 60 18 60 1C 40 
4387: 48 41 00 70 80 
438C: 06 78 7F  118                HEX    06787F071F808083B00080FE707F0F30 
438F: 07 1F 80 80 83 B0 00 80 
4397: FE 70 7F 0F 30 
439C: 80 07 00  119                HEX    8007000C400158011870070C600C600C 
439F: 0C 40 01 58 01 18 70 07 
43A7: 0C 60 0C 60 0C 
43AC: 40 7D 7F  120                HEX    407D7F084300708006783F787F808083 
43AF: 08 43 00 70 80 06 78 3F 
43B7: 78 7F 80 80 83 
43BC: B0 00 C0  121                HEX    B000C0FF0F7E0F308007000C40015801 
43BF: FF 0F 7E 0F 30 80 07 00 
43C7: 0C 40 01 58 01 
43CC: 18 70 00  122                HEX    1870000C600C600C401D400846007080 
43CF: 0C 60 0C 60 0C 40 1D 40 
43D7: 08 46 00 70 80 
43DC: 0C 70 47  123                HEX    0C70477F7F038083B000F07F7F710718 
43DF: 7F 7F 03 80 83 B0 00 F0 
43E7: 7F 7F 71 07 18 
43EC: 80 07 00  124                HEX    8007000C400158011830030C600C600C 
43EF: 0C 40 01 58 01 18 30 03 
43F7: 0C 60 0C 60 0C 
43FC: 40 1D 00  125                HEX    401D00084C0070803C707F7F7F074081 
43FF: 08 4C 00 70 80 3C 70 7F 
4407: 7F 7F 07 40 81 
440C: E0 00 78  126                HEX    E000787F7F7F071E8007000C40015801 
440F: 7F 7F 7F 07 1E 80 07 00 
4417: 0C 40 01 58 01 
441C: 18 30 06  127                HEX    1830060C600C600C4019000858007080 
441F: 0C 60 0C 60 0C 40 19 00 
4427: 08 58 00 70 80 
442C: 7E 6F 7F  128                HEX    7E6F7F7F7D0E6081E0015C5F7F7F7B3F 
442F: 7F 7D 0E 60 81 E0 01 5C 
4437: 5F 7F 7F 7B 3F 
443C: 80 07 00  129                HEX    8007001840010C0314300C1950185018 
443F: 18 40 01 0C 03 14 30 0C 
4447: 19 50 18 50 18 
444C: 60 30 00  130                HEX    6030000870007080635F7F7E7D1D7880 
444F: 08 70 00 70 80 63 5F 7F 
4457: 7E 7D 1D 78 80 
445C: 80 87 6F  131                HEX    80876F5F3F7F7D638007003044110606 
445F: 5F 3F 7F 7D 63 80 07 00 
4467: 30 44 11 06 06 
446C: 12 30 58  132                HEX    12305830683048303060600860007080 
446F: 30 68 30 48 30 30 60 60 
4477: 08 60 00 70 80 
447C: 80 3E 7F  133                HEX    803E7F1E7A711F8080FE672F3C7F3E00 
447F: 1E 7A 71 1F 80 80 FE 67 
4487: 2F 3C 7F 3E 00 
448C: 80 07 00  134                HEX    80070040436101786130304067400741 
448F: 40 43 61 01 78 61 30 30 
4497: 40 67 40 07 41 
449C: 0F 00 3F  135                HEX    0F003F0C40007080800C7C807C430380 
449F: 0C 40 00 70 80 80 0C 7C 
44A7: 80 7C 43 03 80 
44AC: 80 F0 71  136                HEX    80F07117009F18008007000000000000 
44AF: 17 00 9F 18 00 80 07 00 
44B7: 00 00 00 00 00 
44BC: 00 30 00  137                HEX    00300000600000000000000000007080 
44BF: 00 60 00 00 00 00 00 00 
44C7: 00 00 00 70 80 
44CC: 80 80 70  138                HEX    80807080600380808080F00900870080 
44CF: 80 60 03 80 80 80 80 F0 
44D7: 09 00 87 00 80 
44DC: 80 07 00  139                HEX    80070000000000000000000060000000 
44DF: 00 00 00 00 00 00 00 00 
44E7: 00 60 00 00 00 
44EC: 00 00 00  140                HEX    00000000000070808080600158078080 
44EF: 00 00 00 70 80 80 80 60 
44F7: 01 58 07 80 80 
44FC: 80 80 F8  141                HEX    8080F806408300808007000000000000 
44FF: 06 40 83 00 80 80 07 00 
4507: 00 00 00 00 00 
450C: 00 00 00  142                HEX    00000000200000000000000000007080 
450F: 00 20 00 00 00 00 00 00 
4517: 00 00 00 70 80 
451C: 80 80 40  143                HEX    80804001300F80808080BC0340830080 
451F: 01 30 0F 80 80 80 80 BC 
4527: 03 40 83 00 80 
452C: 80 07 00  144                HEX    80070000000000000000000010000000 
452F: 00 00 00 00 00 00 00 00 
4537: 00 10 00 00 00 
453C: 00 00 00  145                HEX    000000000000708080804003601C8080 
453F: 00 00 00 70 80 80 80 40 
4547: 03 60 1C 80 80 
454C: 80 80 CE  146                HEX    8080CE01600100808007000000000000 
454F: 01 60 01 00 80 80 07 00 
4557: 00 00 00 00 00 
455C: 00 00 00  147                HEX    000000000E0000000000000000007080 
455F: 00 0E 00 00 00 00 00 00 
4567: 00 00 00 70 80 
456C: 80 80 40  148                HEX    80804003601C80808080CE0160010080 
456F: 03 60 1C 80 80 80 80 CE 
4577: 01 60 01 00 80 
457C: 80 07 00  149                HEX    80070000000000000000000000000000 
457F: 00 00 00 00 00 00 00 00 
4587: 00 00 00 00 00 
458C: 00 00 00  150                HEX    000000000000708080804003601C8080 
458F: 00 00 00 70 80 80 80 40 
4597: 03 60 1C 80 80 
459C: 80 80 CE  151                HEX    8080CE01600300808007808080808080 
459F: 01 60 03 00 80 80 07 80 
45A7: 80 80 80 80 80 
45AC: 80 80 80  152                HEX    80808080808080808080808080807080 
45AF: 80 80 80 80 80 80 80 80 
45B7: 80 80 80 70 80 
45BC: 80 80 70  153                HEX    80807001300F80808080BC03408E0080 
45BF: 01 30 0F 80 80 80 80 BC 
45C7: 03 40 8E 00 80 
45CC: 80 07 80  154                HEX    80078080808080808080808080808080 
45CF: 80 80 80 80 80 80 80 80 
45D7: 80 80 80 80 80 
45DC: 80 80 80  155                HEX    808080808080708080802C01680A8080 
45DF: 80 80 80 70 80 80 80 2C 
45E7: 01 68 0A 80 80 
45EC: 80 80 D4  156                HEX    8080D40D40B500808007808080808080 
45EF: 0D 40 B5 00 80 80 07 80 
45F7: 80 80 80 80 80 
45FC: 80 80 80  157                HEX    80808080808080808080808080807080 
45FF: 80 80 80 80 80 80 80 80 
4607: 80 80 80 70 80 
460C: 80 80 80  158                HEX    80808080808080808080808080808080 
460F: 80 80 80 80 80 80 80 80 
4617: 80 80 80 80 80 
461C: 80 07 80  159                HEX    80078080808080808080808080808080 
461F: 80 80 80 80 80 80 80 80 
4627: 80 80 80 80 80 
462C: 80 80 80  160                HEX    80808080808070808080808080808080 
462F: 80 80 80 70 80 80 80 80 
4637: 80 80 80 80 80 
463C: 80 80 80  161                HEX    80808080808080808007808080808080 
463F: 80 80 80 80 80 80 07 80 
4647: 80 80 80 80 80 
464C: 80 80 80  162                HEX    80808080808080808080808080807080 
464F: 80 80 80 80 80 80 80 80 
4657: 80 80 80 70 80 
465C: 80 80 80  163                HEX    80808080808080808080808080808080 
465F: 80 80 80 80 80 80 80 80 
4667: 80 80 80 80 80 
466C: 80 07 80  164                HEX    80078080808080808080808080808080 
466F: 80 80 80 80 80 80 80 80 
4677: 80 80 80 80 80 
467C: 80 80 80  165                HEX    80808080808070808080808080808080 
467F: 80 80 80 70 80 80 80 80 
4687: 80 80 80 80 80 
468C: 80 80 80  166                HEX    80808080808080808007000000000000 
468F: 80 80 80 80 80 80 07 00 
4697: 00 00 00 00 00 
469C: 00 00 00  167                HEX    00000000000000000000000000007080 
469F: 00 00 00 00 00 00 00 00 
46A7: 00 00 00 70 80 
46AC: 80 80 80  168                HEX    80808080808080808080808080808080 
46AF: 80 80 80 80 80 80 80 80 
46B7: 80 80 80 80 80 
46BC: 80 07 00  169                HEX    80070000000000000000000000000000 
46BF: 00 00 00 00 00 00 00 00 
46C7: 00 00 00 00 00 
46CC: 00 00 00  170                HEX    00000000000070808080808080808080 
46CF: 00 00 00 70 80 80 80 80 
46D7: 80 80 80 80 80 
46DC: 80 80 80  171                HEX    80808080808080808007000000000000 
46DF: 80 80 80 80 80 80 07 00 
46E7: 00 00 00 00 00 
46EC: 00 00 00  172                HEX    00000000000000000000000000007080 
46EF: 00 00 00 00 00 00 00 00 
46F7: 00 00 00 70 80 
46FC: 80 80 80  173                HEX    80808080808080808080808080808080 
46FF: 80 80 80 80 80 80 80 80 
4707: 80 80 80 80 80 
470C: 80 07 00  174                HEX    80070000000000000000000000000000 
470F: 00 00 00 00 00 00 00 00 
4717: 00 00 00 00 00 
471C: 00 00 00  175                HEX    00000000000070808080808080808080 
471F: 00 00 00 70 80 80 80 80 
4727: 80 80 80 80 80 
472C: 80 80 80  176                HEX    8080808080808080800F000000000000 
472F: 80 80 80 80 80 80 0F 00 
4737: 00 00 00 00 00 
473C: 00 00 00  177                HEX    00000000000000000000000000007880 
473F: 00 00 00 00 00 00 00 00 
4747: 00 00 00 78 80 
474C: 80 80 80  178                HEX    80808080808080808080808080808080 
474F: 80 80 80 80 80 80 80 80 
4757: 80 80 80 80 80 
475C: 80 1E 00  179                HEX    801E0000000000000000000000000000 
475F: 00 00 00 00 00 00 00 00 
4767: 00 00 00 00 00 
476C: 00 00 00  180                HEX    0000000000003C808080808080808080 
476F: 00 00 00 3C 80 80 80 80 
4777: 80 80 80 80 80 
477C: 80 80 80  181                HEX    8080808080808080807C7F7F7F7F7F7F 
477F: 80 80 80 80 80 80 7C 7F 
4787: 7F 7F 7F 7F 7F 
478C: 7F 7F 7F  182                HEX    7F7F7F7F7F7F7F7F7F7F7F7F7F7F1F80 
478F: 7F 7F 7F 7F 7F 7F 7F 7F 
4797: 7F 7F 7F 1F 80 
479C: 80 80 80  183                HEX    80808080808080808080808080808080 
479F: 80 80 80 80 80 80 80 80 
47A7: 80 80 80 80 80 
47AC: 80 78 7F  184                HEX    80787F7F7F7F7F7F7F7F7F7F7F7F7F7F 
47AF: 7F 7F 7F 7F 7F 7F 7F 7F 
47B7: 7F 7F 7F 7F 7F 
47BC: 7F 7F 7F  185                HEX    7F7F7F7F7F7F0F808080808080808080 
47BF: 7F 7F 7F 0F 80 80 80 80 
47C7: 80 80 80 80 80 
47CC: 00 00 00  186                HEX    00000000000000000000000000000000 
47CF: 00 00 00 00 00 00 00 00 
47D7: 00 00 00 00 00 
47DC: 00 00 00  187                HEX    00000000000000000000000000000000 
47DF: 00 00 00 00 00 00 00 00 
47E7: 00 00 00 00 00 
47EC: 00 00 00  188                HEX    000000000000000000 
47EF: 00 00 00 00 00 00 
                189  
                190  
                191                SAV    SCRN.MENU 

Object saved as SCRN.MENU,A$4000,L$07F5



--End assembly, 2037 bytes, Errors: 0 


Symbol table - alphabetical order:

   CHARGE       =$402B   ?  DEBUT        =$4007      FOLLOW1      =$401E      HPOSN        =$F411
   LOOPY        =$400B      RESULM       =$26        STOCK        =$404C      Y            =$1A



Symbol table - numerical order:

   Y            =$1A        RESULM       =$26     ?  DEBUT        =$4007      LOOPY        =$400B
   FOLLOW1      =$401E      CHARGE       =$402B      STOCK        =$404C      HPOSN        =$F411

